home *** CD-ROM | disk | FTP | other *** search
Text File | 1994-06-26 | 3.2 KB | 200 lines | [TEXT/MPS ] |
- /*
- File: App.cp
-
- Contains: Boilerplate application-specific code.
-
- Written by: Dave Falkenburg
-
- Copyright: © 1993-94 by Dave Falkenburg, all rights reserved.
-
- Change History (most recent first):
-
- */
-
- #include <Windows.h>
- #include <Dialogs.h>
- #include <Menus.h>
- #include <Desk.h>
- #include <Errors.h>
- #include <Resources.h>
- #include <StandardFile.h>
-
- #include "AppLib.h"
- #include "Window.h"
-
- #include "ToolWindow.h"
- #include "DocWindow.h"
- #include "DialogWindow.h"
- #include "MailerWindow.h"
- #include "SortPicts.h"
-
- #include "MenuBar.h"
-
-
- // Function Prototypes:
-
- void AboutBox(void);
- void OpenExistingDocument(void);
-
- OSErr
- SetupApplication(void)
- {
- short prefsRefNum;
-
- prefsRefNum = OpenPreferencesResFile();
-
- SetMenuBar(GetNewMBar(rMenuBar));
- AddResMenu(GetMHandle(mApple),'DRVR'); // Append Apple Menu Items
-
- TToolWindow *someTools = new TToolWindow(129);
- TToolWindow *moreTools = new TToolWindow(130);
-
- InitCursor();
- return (noErr);
- }
-
- void
- HandleMenu(TWindow * topWindowObj, long menuCode)
- {
- short menu = (short) (menuCode >> 16);
- short item = (short) (menuCode & 0xffff);
- Str255 deskAccName;
-
- switch (menu)
- {
- case mApple:
- switch (item)
- {
- case iAbout:
- AboutBox();
- break;
-
- default:
- GetItem(GetMHandle(mApple),item,deskAccName);
- (void) OpenDeskAcc(deskAccName);
- break;
- }
- break;
-
- case mFile:
- switch (item)
- {
- case iNew:
- OpenNewDocument();
- break;
-
- case iOpen:
- OpenExistingDocument();
- break;
-
- case iClose:
- HandleClose(FrontNonFloatingWindow());
- break;
-
- case iQuit:
- gDone = true;
- break;
-
- default:
- break;
- }
- break;
-
- case mEdit:
- if ((!SystemEdit(item-1)) && (topWindowObj != nil))
- {
- if (topWindowObj->CanEdit())
- topWindowObj->DoEditMenu(item);
- }
-
- case mTest:
- switch(item)
- {
- case iNewDialog:
- TDialogWindow * aDialog = new TDialogWindow(257);
- break;
-
- default:
- break;
- }
- break;
-
- default:
- break;
- }
-
- HiliteMenu(0);
- }
-
-
- void
- AboutBox(void)
- {
- Handle versionHandle;
- StringPtr nullStr = (StringPtr) "\p";
- StringPtr shortVersionString = nullStr;
- short itemHit;
-
- versionHandle = GetResource('vers',1);
- if (versionHandle)
- shortVersionString = (StringPtr) ((char *) *versionHandle + 6);
- ParamText(shortVersionString,nullStr,nullStr,nullStr);
- ReleaseResource(versionHandle);
-
- itemHit = StandardAlert(256);
- }
-
-
- void
- OpenExistingDocument(void)
- {
- StandardFileReply reply;
- SFTypeList ourTypes;
-
- Point where = { -1, -1 };
-
- HiliteWindowsForModalDialog(false);
- CustomGetFile((FileFilterYDUPP) nil, -1, ourTypes, &reply, 0, where,
- (DlgHookYDUPP) nil,StandardDialogFilterYD, nil,nil,nil);
- HiliteWindowsForModalDialog(true);
- }
-
-
- void
- ConvertClipboard(void)
- {
- }
-
-
- OSErr
- OpenNewDocument(void)
- {
- SortPicts *aNewWindow = new SortPicts();
-
- if (aNewWindow)
- return noErr;
- else
- return memFullErr;
- }
-
-
- OSErr
- OpenDocument(LetterDescriptor * /* theDocument */)
- {
- return OpenNewDocument(); // cheat for now…
- }
-
-
- OSErr
- PrintDocument(LetterDescriptor * /* theDocument */)
- {
- return noErr;
- }
-
-
- Boolean
- QuitApplication(void)
- {
- return true;
- }
-